﻿Public Class DanhSachMonHoc

    Private Sub btnThem_Click(sender As System.Object, e As System.EventArgs) Handles btnThem.Click
        Me.Close()
        Dim frm As ThemMonHoc = New ThemMonHoc()
        frm.Show()
    End Sub

    Private Sub btnSua_Click(sender As System.Object, e As System.EventArgs) Handles btnSua.Click
        Dim str As String
        Dim row As Integer = Me.listView1.SelectedItems(0).Index
        str = Me.listView1.Items(row).SubItems(0).Text
        Me.Close()
        Dim frm As SuaMonHoc = New SuaMonHoc(str)
        frm.Show()

    End Sub

    Private Sub btnXoa_Click(sender As System.Object, e As System.EventArgs) Handles btnXoa.Click
        Dim str As String
        Dim row As Integer = Me.listView1.SelectedItems(0).Index
        str = Me.listView1.Items(row).SubItems(0).Text
        Me.Close()
        Dim frm As XoaMonHoc = New XoaMonHoc(str)
        frm.Show()

    End Sub

    Private Sub btnThoat_Click(sender As System.Object, e As System.EventArgs) Handles btnThoat.Click
        Me.Close()
    End Sub
End Class